# Replicate Table D1
t9_m1 <- lm(att_org ~ group2 +group3+ group4 + age + gender +education, data = dat2020)
t9_m2 <- lm(att_org ~ group2 +group3+ group4 + age + gender +education, data = obey)
t9_m3 <- lm(att_org ~ group2 +group3+ group4 + age + gender +education, data = disobey)

stargazer (t9_m1, t9_m2, t9_m3)
